shr.el: Comment.

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 6d3ebe706a48fe7f1df80b5f7b1243fb20a64d71..d43d3cb3e5bf057fad91ec99511b726b9b7f8576 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -587,6 +587,8 @@ size, and full-buffer size."
 
 (autoload 'url-expand-file-name "url-expand")
 
+;; FIXME This needs some tests writing.
+;; Does it even need to exist, given that url-expand-file-name does?
 (defun shr-expand-url (url &optional base)
   (setq base
        (if base